home *** CD-ROM | disk | FTP | other *** search
/ Sports Illustrated for Kids - Awesome Athletes! / Sports Illustrated for Kids - Awesome Athletes!.iso / tr.dir / 00007_BalloonParentObject.ls < prev    next >
Encoding:
Text File  |  1996-04-18  |  1.5 KB  |  92 lines

  1. property mMySpriteChan, mMyPointValue, mAmIDouble, mzQuestHistory, mHaveIBeenDouble, mAmIPopped, mMyDoubleFlag, mQuestion, mPopColor, mMyCastNum
  2.  
  3. on birth me
  4.   set mzQuestHistory to list()
  5.   return me
  6. end
  7.  
  8. on mGetMyPopColor me
  9.   return the mPopColor of me
  10. end
  11.  
  12. on mSetMyPopColor me, arg
  13.   set the mPopColor of me to arg
  14. end
  15.  
  16. on mGetMyQuestion me
  17.   return the mQuestion of me
  18. end
  19.  
  20. on mSetMyQuestion me, arg
  21.   set the mQuestion of me to arg
  22. end
  23.  
  24. on mGetAmIPopped me
  25.   return the mAmIPopped of me
  26. end
  27.  
  28. on mSetAmIPopped me, arg
  29.   set the mAmIPopped of me to arg
  30. end
  31.  
  32. on mGetMyVisible me
  33.   return the visible of sprite mMySpriteChan
  34. end
  35.  
  36. on mSetMyVisible me, arg
  37.   set the visible of sprite mMySpriteChan to arg
  38.   updateStage()
  39. end
  40.  
  41. on mSetMySpriteChan me, arg
  42.   set mMySpriteChan to arg
  43. end
  44.  
  45. on mGetMySpriteChan me
  46.   return mMySpriteChan
  47. end
  48.  
  49. on mSetMyPointValue me, arg
  50.   set the mMyPointValue of me to arg
  51. end
  52.  
  53. on mGetMyPointValue me
  54.   return the mMyPointValue of me
  55. end
  56.  
  57. on mSetAmIDouble me, arg
  58.   set the mAmIDouble of me to arg
  59. end
  60.  
  61. on mGetAmIDouble me
  62.   return the mAmIDouble of me
  63. end
  64.  
  65. on mGetQuestHistory me
  66.   return the mzQuestHistory of me
  67. end
  68.  
  69. on mSetQuestHistory me, arg
  70.   append(mzQuestHistory, arg)
  71. end
  72.  
  73. on mSetHaveIBeenDouble me, arg
  74.   set the mHaveIBeenDouble of me to arg
  75. end
  76.  
  77. on mGetHaveIBeenDouble me
  78.   return the mHaveIBeenDouble of me
  79. end
  80.  
  81. on mResetQuestList me
  82.   set mzQuestHistory to list()
  83. end
  84.  
  85. on mGetMyCastNum me
  86.   return the mMyCastNum of me
  87. end
  88.  
  89. on mSetMyCastNum me, arg
  90.   set the mMyCastNum of me to arg
  91. end
  92.